home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Science / Asymptote Demo / Examples / Demos / 10) VY CMA / newGraphlocation < prev    next >
Encoding:
Text File  |  1994-05-07  |  532 b   |  21 lines  |  [TEXT/DWat]
  1. % Shift the graph frame up by its current height
  2. graphframe gleft gright gtop gtop gtop gbottom - +
  3.  
  4. % Set the limits of the graph to make positioning the label easier
  5. graphlimits 0 1 0 1
  6. % Move to a position just outside of the frame
  7. moveto 1.1 .5
  8.  
  9. % Turn clip to frame off so the label will be visible
  10. cliptoframe false
  11.  
  12. % Draw the label at twice the current scale
  13. scale scale 2 *
  14. drawlabel centerright &1
  15. scale scale .5 *
  16.  
  17. % Turn clip to frame back on
  18. cliptoframe true
  19.  
  20. % Hide this window (so it doesn't clutter the desktop)
  21. hide